home *** CD-ROM | disk | FTP | other *** search
/ Eagles Nest BBS 7 / Eagles_Nest_Mac_Collection_Disc_7.TOAST / General Communication / TelebitCCL / Telebit1200.CCL next >
Text File  |  1990-01-09  |  8KB  |  268 lines

  1. !******************************************************************************
  2. !6/17/89                         USA Modem.CCL
  3. !MES                              Version 5.0
  4. !
  5. ! This CCL is for connection through a generic Hayes-compatible modem.
  6. ! If you have questions about this CCL, CCLs in general, or if you need 
  7. ! assistance configuring a CCL to work with your phone system or modem, 
  8. ! please send a link to CCL.SUPPORT and we will be happy to lend a hand!  
  9. !                             -Your friends at AppleLink Engineering
  10. !******************************************************************************
  11. !
  12. ! The following is the disconnect sequence...
  13. !
  14. !==============================================================================
  15. *-LABEL 0
  16. *MatchStr 1 1 OFF
  17. *MatchStr 2 1 CRU
  18. *MatchStr 3 1 NO CAR
  19. *Wait 800
  20. !
  21. *-LABEL 1
  22. *HangUp
  23. *Exit 0
  24. !==============================================================================
  25. !
  26. !-----------------------------------------------------------------------------
  27. ! MODEM CONNECT SEQUENCE
  28. ! The following is the sequence of commands required to connect to AppleLink
  29. ! using a Hayes-compatible modem. Although there are no guarantees, if the 
  30. ! modem is built to Hayes specifications, this CCL should work fine.
  31. !
  32. ! Labels 0 to 29 may be modified to connect various modems and network hardware
  33. ! as described in the AppleLink CCL Connection Notes. Labels 30 to 36 will
  34. ! complete the sign-on process.
  35. !==============================================================================
  36. !
  37. -LABEL 0
  38. CDOff
  39. CanBtn 62
  40. SetVar 1 0  -- number of attempts to get OK from modem
  41. SerReset ~BAUD 0 8 1
  42. HSReset 0 0 17 19                   Turn off handshaking until Connected
  43. ChrDelay 2
  44. Flush
  45. !
  46. -LABEL 1
  47. DsplyMsg Signalling the modem...
  48. MatchStr 1 2 OK
  49. MatchStr 2 45 CARRIER
  50. Xmit ATS50=2\13
  51. Wait 180
  52. IncVar 1
  53. IfVar 1 3 47
  54. Jump 1
  55. !
  56. !------------------------------FIRST BOX (PHONE)-------------------------------
  57. -LABEL 2
  58. DsplyPic 1
  59. SetVar 1 0
  60. !
  61. -LABEL 3
  62. DsplyMsg Dialing ~FONE…
  63. MatchStr 1 48 CARRIER
  64. MatchStr 2 4 CON
  65. MatchStr 3 4 ECT
  66. MatchStr 4 5 BUSY
  67. Pause 30
  68. Xmit ATD~TONE~FONE\13
  69. Wait 500
  70. DsplyMsg Waiting for connection...
  71. Wait 1800
  72. DsplyMsg No connection. Trying again…
  73. IncVar 1
  74. IfVar 1 3 49
  75. JSR 20
  76. Pause 60
  77. Flush
  78. Jump 3
  79. !
  80. -LABEL 4
  81. MatchStr 2 30 U#
  82. DsplyMsg Requesting network attention...
  83. DsplyPic 2
  84. Wait 50
  85. ChrDelay 50
  86. Xmit HH
  87. ChrDelay 2
  88. Wait 300
  89. IncVar 2
  90. IfVar 2 3 51
  91. DsplyMsg The network is not responding. Trying again...
  92. JSR 20
  93. Pause 60
  94. Flush
  95. DsplyPic 0
  96. Jump 1
  97. !
  98. -LABEL 5
  99. DsplyMsg The network phone number is busy; trying again...
  100. IncVar 1
  101. IfVar 1 3 49
  102. JSR 20
  103. Pause 60
  104. Flush
  105. Jump 3
  106. !
  107. !
  108. -LABEL 20
  109. SetVar 8 0
  110. ChrDelay 2
  111. MatchStr 1 23 OK
  112. !
  113. -LABEL 21
  114. HangUp
  115. Wait 60
  116. !
  117. -LABEL 23
  118. Return
  119. !
  120. !
  121. !==============================================================================
  122. !                         Network Connect Sequence
  123. !
  124. !              DO NOT CHANGE THE INFORMATION IN THIS SECTION.
  125. !      DOING SO WILL PREVENT THE PROPER COMPLETION OF THE CONNECTION.
  126. !==============================================================================
  127. !
  128. -LABEL 30 -- Box  3 (Establishing connection)
  129. DsplyMsg Connection established.
  130. DsplyPic 3
  131. SetTries 0   -- for REENTER
  132. MatchStr 1 36 SYSTEM REA
  133. MatchStr 2 59 BAD VERSION
  134. MatchStr 3 53 VALIDATION FAU
  135. MatchStr 4 57 OUT OF
  136. MatchStr 5 56 INVALID QUIKCOMM
  137. MatchStr 6 54 VICE INTERRUPTED
  138. MatchStr 7 54 STEM UNAVAIL
  139. MatchStr 8 50 NO CARRIER
  140. MatchStr 9 60 FATAL
  141. MatchStr 10 54 STEM IS UNAVAIL
  142. MatchStr 11 37 REENTER
  143. DsplyMsg Logging on...
  144. Xmit ~CODE,~USER,!~USER,~PASS;~VERS;MAC;EFX;~DATE\13
  145. DsplyPic 4
  146. DsplyMsg Requesting access...
  147. SetVar 1 0
  148. !
  149. -LABEL 33 -- Logon
  150. IncVar 1
  151. Wait 600
  152. ChrDelay 3
  153. Xmit ~CODE,~USER,!~USER,~PASS;~VERS;MAC;EFX;~DATE\13
  154. IfVar 1 3 53                            If three tries have been made, error
  155. Jump 33                                 If no response at all, try again
  156. !
  157. -LABEL 36 -- Boxes 5 and 6  (entering system)
  158. DsplyPic 5
  159. DsplyMsg Access granted.
  160. EFX_ON                                  Turn on Mac error protocol
  161. DsplyPic 6
  162. DsplyMsg Waiting for AppleLink Services...
  163. ChrDelay 0
  164. Exit 0                                  We're in
  165. !
  166. -LABEL 37  -- if REENTER from host
  167. Xmit ~CODE,~USER,!~USER,~PASS;~VERS;MAC;EFX;~DATE\13
  168. IncTries
  169. IfTries 3 53
  170. Jump 33
  171. !
  172. ! ERROR MESSAGES
  173. !
  174. ! Labels 40-46 are available for user modification and use.
  175. !
  176. ! Labels 47-60
  177. ! These error labels are reserved for network connection errors and standard
  178. ! modem errors. DO NOT CHANGE THESE LABELS.  Doing so may cause unpredictable
  179. ! results, and may prevent proper connection.
  180. !
  181. !----------------------------------MODEM ERRORS-------------------------------
  182. !
  183. -LABEL 45
  184. Alert 63 Sorry! Unable to make the modem setting changes.\13Check the modem to make sure that it is Hayes compatible.\13If the problem continues, contact the ~APPL helpline.
  185. HangUp
  186. Exit -1
  187. !
  188. -LABEL 47                              MODEM NOT RESPONDING
  189. JSR 61
  190. Alert 63 The modem isn’t responding to requests. Check the modem switches, the interface cable and phone connections, and turn the modem off and back on again.
  191. Jump 0
  192. !
  193. !
  194. -LABEL 48                               NO CARRIER
  195. JSR 61
  196. Alert 63 The phone line isn’t staying connected while attempting to connect to the network phone number.
  197. Jump 0
  198. !
  199. !
  200. -LABEL 49                               NO ANSWER ON NODE (OR BUSY)
  201. JSR 61
  202. Alert 63 Unable to establish connection with the network phone number.\13\13If the problem continues, call the ~APPL HelpLine.
  203. Jump 0
  204. !
  205. !-------------------------------NETWORK ERRORS---------------------------------
  206. -LABEL 50                               NO CARRIER
  207. JSR 61
  208. Alert 63 The phone line is not staying connected; the line has gone dead.  Please try turning your modem off then back on before trying again.
  209. Jump 0
  210. !
  211. -LABEL 51 -- no U# response error (timeout)
  212. JSR 61
  213. Alert 62 The ~APPL network is not responding after repeated attempts. It is possible the connection has been broken. If the problem continues, call the ~APPL HelpLine.
  214. Exit -1
  215. !
  216. -LABEL 52 -- NON ACCEPT OF SET PROTOCOL COMMAND
  217. JSR 61
  218. Alert 63 The AppleLink network is not responding to requests to set the proper error free protocol.  If the problem continues, call the ~APPL HelpLine.  
  219. Jump 0
  220. !
  221. -LABEL 53 -- system number error
  222. JSR 61
  223. Alert 62 The system number entered in the Setup dialog is not being accepted by the ~APPL network.  Please check to see that it is entered correctly. If you need assistance, call the ~APPL HelpLine.
  224. Exit -1
  225. !
  226. -LABEL 54 -- service unavailable/interrupted
  227. JSR 61
  228. Alert 62 The ~APPL network is not available at this time.  It may be closed for routine maintenance.\13\13Please try again later.
  229. Exit -1
  230. !
  231. -LABEL 56 -- invalid address
  232. Xmit STOP\13
  233. JSR 61
  234. Alert 62 The password or ~APPL address entered was not accepted. Check to see that all information in the setup dialog is entered correctly by choosing “Setup” from the Network menu.
  235. Exit -1
  236. !
  237. -LABEL 57 -- out of time
  238. JSR 61
  239. Alert 62 The network has reported that your account has exceeded its allocation of connect time. If you need assistance, call the ~APPL HelpLine.
  240. Exit -1
  241. !
  242. -LABEL 59 -- bad software version
  243. JSR 61
  244. Alert 62 You are using an outdated version of the AppleLink software that can no longer access the network. Call the ~APPL HelpLine for assistance.
  245. Exit -1
  246. !
  247. -LABEL 60 -- FATAL ERROR PREPARING SYSTEM
  248. JSR 61
  249. Alert 62 The network has reported a serious error in preparing the system for use. Call the ~APPL HelpLine for assistance.
  250. Exit -1
  251. !
  252. !==============================================================================
  253. ! ERROR TERMINATOR LABELS
  254. !==============================================================================
  255. !
  256. -LABEL 61                                   Disconnect Subroutine
  257. HangUp
  258. Return
  259. !
  260. !
  261. -LABEL 62                                   Cancel Button Disconnect
  262. JSR 61
  263. Jump 63
  264. !
  265. !
  266. -LABEL 63                                   Exit with Error
  267. Exit -1
  268. ###